Fix compilation warning in snake.el

* lisp/play/snake.el (snake-reset-game): Avoid warning about
unused variable.

diff --git a/lisp/play/snake.el b/lisp/play/snake.el
index 00072a4c05c682f7c77e70e09f9c2510808db9be..8ea214d802517e289c5343a88eb2c261ce216ed7 100644 (file)
--- a/lisp/play/snake.el
+++ b/lisp/play/snake.el
@@ -279,7 +279,7 @@ and then start moving it leftwards.")
        snake-velocity-queue    nil)
   (let ((x snake-initial-x)
        (y snake-initial-y))
-    (dotimes (i snake-length)
+    (dotimes (_ snake-length)
       (gamegrid-set-cell x y snake-snake)
       (setq snake-positions (cons (vector x y) snake-positions))
       (cl-incf x snake-velocity-x)